home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 May: Tool Chest / Developer CD Series May 1996 (Tool Chest) (Apple Computer) (1996).iso / Tool Chest / Development Tools & Languages / Macintosh Common Lisp Related / Symbolic Composer Demo.sea / Symbolic Composer Demo / Graffities / Fractal-Modulated Cantata < prev    next >
Encoding:
Text File  |  1994-05-15  |  9.1 KB  |  57 lines  |  [Graf/ScoM]
  1.  
  2. 17301855 
  3. 6488257 
  4. ("Geneva" 9 :srcor :plain) 
  5. (4456520 4325448 3604552 3145800 4390985 4325449 3539017 3145801 4456522 4456522 3539018 3145802 4325451 4456523 3473483 3211339 4456524 4653132 3473484 3145804 4456525 4718669 3473485 3014733 4522062 4849742 3539022 3014734 4390991 4915279 3539023 2949199 4522064 4849744 3539024 2949200 4522065 4718673 3473489 3014737 4587602 4653138 3539026 3014738 4522067 4522067 3539027 3145811 4653140 4522068 3539028 3014740 4653141 4390997 3604565 3014741 4718678 4390998 3670102 2949206 4653143 4259927 3735639 2949207 4849752 4325464 3604568 2949208 4915289 4194393 3539033 2883673 4980826 4259930 3407962 2883674 4915291 4194395 3342427 2949211 5111900 4259932 3276892 2818140 5177437 4194397 3211357 2752605 5242974 4259934 3211358 2687070 5177439 4194399 3211359 2621535 5242976 4194400 3211360 2621536 5111905 4128865 3211361 2687073 5046370 4128866 3276898 2818146 4849763 3997795 3276899 2949219 4849764 3997796 3342436 2883684 4718693 3932261 3407973 2883685 4718694 3997798 3539046 2883686 4522087 3932263 3670119 2883687 4522088 3997800 3539048 2883688 4456553 3932265 3473513 2883689 4456554 3997802 3407978 2949226 4259947 3997803 3342443 3014763 4325484 4063340 3342444 2949228 4259949 4063341 3276909 2883693 4194414 4194414 3342446 2818158 4063343 4194415 3342447 2818159 4128880 4063344 3276912 2818160 4063345 3866737 3211377 2883697 4063346 3801202 3211378 2949234 3866739 3539059 3211379 3080307 3997812 3539060 3211380 3014772 3932277 3342453 3211381 2949237 3932278 3276918 3276918 2949238 3735671 3080311 3342455 2949239 3866744 3080312 3211384 2949240 3801209 2949241 3080313 2949241 3866746 2949242 2949242 2949242 3735675 2752635 2818171 3014779 3866748 2818172 2752636 2883708 3801213 2687101 2687101 2818173 3866750 2687102 2687102 2752638 3735679 2621567 2621567 2752639 3866752 2687104 2687104 2752640 3801217 2687105 2687105 2818177 3866754 2818178 2752642 2883714 3735683 2752643 2818179 3014787 3866756 2949252 2949252 2949252 3801221 2949253 3080325 2949253 3866758 3080326 3211398 2949254 3735687 3080327 3342471 2949255 3932296 3276936 3276936 2949256 3932297 3342473 3211401 2949257 3997834 3539082 3211402 3014794 3866763 3539083 3211403 3080331 4063372 3801228 3211404 2949260 4063373 3866765 3211405 2883725 4128910 4063374 3276942 2818190 4063375 4194447 3342479 2818191 4194448 4194448 3342480 2818192 4259985 4063377 3276945 2883729 4325522 4063378 3342482 2949266 4259987 3997843 3342483 3014803 4456596 3997844 3408020 2949268 4456597 3932309 3473557 2883733 4522134 3997846 3539094 2883734 4522135 3932311 3670167 2883735 4718744 3997848 3539096 2883736 4718745 3932313 3408025 2883737 4849818 3997850 3342490 2883738 4849819 3997851 3276955 2949275 5046428 4128924 3276956 2818204 5111965 4128925 3211421 2687133 5243038 4194462 3211422 2621598 5177503 4194463 3211423 2621599 5243040 4260000 3211424 2687136 5177505 4194465 3211425 2752673 5111970 4260002 3276962 2818210 4915363 4194467 3342499 2949283 4980900 4260004 3408036 2883748 4915365 4194469 3539109 2883749 4849830 4325542 3604646 2949286 4653223 4260007 3735719 2949287 4718760 4391080 3670184 2949288 4653225 4391081 3604649 3014825 4653226 4522154 3539114 3014826 4522155 4522155 3539115 3145899 4587692 4653228 3539116 3014828 4522157 4718765 3473581 3014829 4522158 4849838 3539118 2949294 4391087 4915375 3539119 2949295 4522160 4849840 3539120 3014832 4456625 4718769 3473585 3014833 4456626 4653234 3473586 3145906 4325555 4456627 3473587 3211443 4456628 4456628 3539124 3145908 4391093 4325557 3539125 3145909 5112064 5112063 5112062 5177597 5243132 5177595 5112058 5046521 5046520 4980983 4980982 4980981 4980980 4849907 4718834 4653297 4653296 4587759 4587758 4587757 4653292 4522219 4456682 4391145 4391144 4325607 4260070 4260069 4260068 4128995 3997922 3866849 3801312 3801311 3866846 3932381 3997916 3932379 3866842 3866841 3866840 3801303 3801302 3801301 3866836 3735763 3670226 3604689 3539152 3539151 3539150 3604685 3670220 3604683 3539146 3473609 3473608 3408071 3408070 3342533 3408068 3276995 3145922 3080385 3014848 3014847 3080382 3145917 3276988 3211451 3145914 3145913 3145912 3145911 3145800 3145799 3145798 3211333 3276868 3145795 3080258 3014721 3014720 3080255 3145790 3276861 3407932 3342395 3407930 3407929 3473464 3473463 3538998 3604533 3670068 3604531 3538994 3538993 3538992 3604527 3670062 3735597 3866668 3801131 3801130 3801129 3866664 3866663 3866662 3932197 3997732 3932195 3866658 3801121 3801120 3866655 3997726 4128797 4259868 4259867 4259866 4325401 4390936 4390935 4456470 4522005 4653076 4587539 4587538 4587537 4653072 4653071 4718606 4849677 4980748 4980747 4980746 4980745 5046280 5046279 5111814 5177349 5242884 5177347 5111810 5111809 5111808 4784384 4784383 4784382 4849917 4849916 4980987 5046522 5112057 5243128 5177591 5046518 4980981 4980980 4915443 4915442 4915441 4980976 4915439 4849902 4849901 4849900 4849899 4849898 4915433 4980968 4849895 4718822 4587749 4522212 4456675 4391138 4325601 4325600 4260063 4260062 4260061 4325596 4325595 4391130 4456665 4587736 4456663 4325590 4260053 4194516 4128979 4128978 4128977 4128976 4063439 3932366 3932365 3866828 3866827 3866826 3932361 3932360 3801287 3604678 3473605 3408068 3276995 3211458 3145921 3080384 3080383 3145918 3211453 3211452 3342523 3408058 3539129 3670200 3604663 3670088 3539015 3407942 3342405 3211332 3211331 3145794 3080257 3080256 3145791 3211326 3276861 3407932 3473467 3604538 3801145 3932216 3932215 3866678 3866677 3866676 3932211 3932210 4063281 4128816 4128815 4128814 4128813 4194348 4259883 4325418 4456489 4587560 4456487 4390950 4325413 4325412 4259875 4259874 4259873 4325408 4325407 4390942 4456477 4522012 4587547 4718618 4849689 4980760 4915223 4849686 4849685 4849684 4849683 4849682 4915217 4980752 4915215 4915214 4915213 4980748 4980747 5046282 5177353 5242888 5111815 5046278 4980741 4849668 4849667 4784130 4784129 4784128 3932416 3997951 3997950 4063485 3997948 4129019 4129018 4260089 4260088 4456695 4456694 4587765 4653300 4849907 4915442 5112049 5177584 5177583 5046510 5046509 4849900 4915435 4784362 4849897 4718824 4784359 4718822 4784357 4718820 4849891 4784354 4915425 4915424 4915423 4849886 4849885 4718812 4784347 4784346 4849881 4784344 4849879 4849878 4915413 4915412 5046483 5112018 5243089 5243088 5177551 4980942 4915405 4718796 4653259 4522186 4522185 4325576 4325575 4260038 4260037 4128964 4128963 4063426 4128961 4063424 4128959 4063422 4128957 4063420 4128955 4128954 4194489 4194488 4325559 4194376 4194375 4128838 4128837 4063300 4128835 4063298 4128833 4063296 4128831 4063294 4128829 4128828 4259899 4259898 4325433 4325432 4522039 4522038 4653109 4718644 4915251 4980786 5177393 5242928 5242927 5111854 5046317 4915244 4915243 4849706 4849705 4784168 4849703 4784166 4784165 4718628 4849699 4849698 4915233 4915232 4915231 4784158 4849693 4718620 4784155 4718618 4784153 4718616 4849687 4784150 4915221 4849684 5046291 5046290 5177361 5177360 5111823 4915214 4849677 4653068 4587531 4456458 4456457 4259848 4259847 4128774 4128773 3997700 4063235 3997698 3997697 3932160 2621696 2752767 2752766 2818301 2687228 2818299 2818298 2883833 2818296 2949367 2949366 3080437 3014900 3145971 3211506 3277041 3211504 3408111 3408110 3539181 3473644 3670251 3735786 3866857 3801320 3997927 4063462 4260069 4194532 4456675 4522210 4653281 4653280 4718815 4653278 4587741 4456668 4522203 4456666 4391129 4260056 4325591 4325590 4325589 4194516 4260051 4260050 4260049 4128976 4260047 4194510 4260045 4128972 4260043 4260042 4260041 4128968 4325575 4325574 4391109 4325572 4456643 4456642 4522177 4456640 4522175 4522174 4522173 4391100 4456635 4391098 4456633 4325560 4456631 4325448 4456519 4390982 4456517 4390980 4522051 4522050 4522049 4456512 4522047 4456510 4456509 4325436 4390971 4325434 4325433 4128824 4259895 4259894 4259893 4128820 4259891 4194354 4259889 4128816 4259887 4259886 4259885 4194348 4325419 4325418 4325417 4259880 4390951 4456486 4522021 4456484 4587555 4653090 4718625 4653088 4653087 4522014 4456477 4194332 4259867 4063258 3997721 3801112 3866647 3735574 3670037 3473428 3538963 3407890 3407889 3211280 3276815 3211278 3145741 3014668 3080203 2949130 2949129 2818056 2883591 2818054 2818053 2686980 2818051 2752514 2752513 2621440) 
  6. "; using the brownian noise generator, modify the
  7. ; spatial modulator parameter phase shift value to get
  8. ; interesting parallel melodic structures, then zoom 
  9. ; into it for closer examination" 
  10. 190 
  11. 0 
  12. 6553667 
  13. 1835166 
  14. nil 
  15. 29622272 
  16. 29622272 
  17. 2818172 
  18. 7602392 
  19. 16 
  20. 10 
  21. 2 
  22. 6 
  23. 5 0 80
  24.    (gen-noise-brownian 8 0.8593 0.79 spatmod 120))
  25. (vector-round 40 80
  26.    (gen-noise-brownian 8 0.8593 0.79 spatmod 112))
  27.  
  28. (vector-round 40 80
  29.    (gen-noise-brownian 8 0.8593 0.79 spatmod 142))
  30. (vector-round 40 80
  31.    (gen-noise-brownian 8 0.8593 0.79 spatmod 145))
  32.  
  33. ; Experiments of changing spatial modulation phase
  34. ; to build parallel melodic structures
  35.  
  36. (vector-round 40 80
  37.    (gen-noise-brownian 8 0.8593 0.79 spatmod 149))
  38. (vector-round 40 80
  39.    (gen-noise-brownian 8 0.8593 0.79 spatmod 150))
  40. (vector-round 40 80
  41.    (gen-noise-brownian 8 0.8593 0.79 spatmod 151))
  42. (vector-round 40 80
  43.    (gen-noise-brownian 8 0.8593 0.79 spatmod 152))" 
  44. 922 
  45. 548 
  46. 6029376 
  47. 2162834 
  48. nil 
  49. 29622272 
  50. 29622272 
  51. 3342457 
  52. 7274700 
  53. 16 
  54. 10 
  55. 2 
  56. 6 
  57. 5